home *** CD-ROM | disk | FTP | other *** search
/ Skunkware 98 / Skunkware 98.iso / src / net / bind-contrib.tar.gz / bind-contrib.tar / contrib / rfc1101 / main.c next >
Encoding:
C/C++ Source or Header  |  1996-10-25  |  5.2 KB  |  208 lines
  1. /* Copyright (c) 1993 Carlos Leandro and Rui Salgueiro
  2.  *    Dep. Matematica Universidade de Coimbra, Portugal, Europe
  3.  */
  4. /*
  5.  * Copyright (c) 1983 Regents of the University of California.
  6.  * All rights reserved.
  7.  *
  8.  * Redistribution and use in source and binary forms, with or without
  9.  * modification, are permitted provided that the following conditions
  10.  * are met:
  11.  * 1. Redistributions of source code must retain the above copyright
  12.  *    notice, this list of conditions and the following disclaimer.
  13.  * 2. Redistributions in binary form must reproduce the above copyright
  14.  *    notice, this list of conditions and the following disclaimer in the
  15.  *    documentation and/or other materials provided with the distribution.
  16.  * 3. All advertising materials mentioning features or use of this software
  17.  *    must display the following acknowledgement:
  18.  *    This product includes software developed by the University of
  19.  *    California, Berkeley and its contributors.
  20.  * 4. Neither the name of the University nor the names of its contributors
  21.  *    may be used to endorse or promote products derived from this software
  22.  *    without specific prior written permission.
  23.  *
  24.  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  25.  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  26.  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  27.  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  28.  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  29.  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  30.  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  31.  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  32.  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  33.  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  34.  * SUCH DAMAGE.
  35.  */
  36.  
  37. #if defined(LIBC_SCCS) && !defined(lint)
  38. static char    sccsid[] = "@(#)main.c    1.4 (Coimbra) 93/06/03";
  39. #endif /* LIBC_SCCS and not lint */
  40.  
  41. #include <sys/types.h>
  42. #include <netdb.h>
  43. #include <stdio.h>
  44. #include <string.h>
  45. #include <sys/socket.h>
  46. #include <netinet/in.h>
  47. #include <arpa/inet.h>
  48. #include <ctype.h>
  49.  
  50. #include <arpa/nameser.h>
  51. #include <resolv.h>
  52.  
  53. #define    ADDR 1
  54. #define    NAME 2
  55. #define    UNDEF -1
  56.  
  57. int    h_errno;
  58. void    herror();
  59.  
  60. char    *progname;
  61. char    *use = "%s [-d] [-a addr | -n name | string]  \n";
  62. int    name_or_addr = UNDEF;
  63.  
  64. main(argc, argv)
  65. int    argc;
  66. char    *argv[];
  67. { 
  68.     char    **ch, c, *net_name_or_addr, *s;
  69.     struct netent *net_entry;
  70.     register unsigned long    net2, nn;
  71.     unsigned    netbr[4];
  72.  
  73.     progname = argv[0];
  74.     net_name_or_addr = NULL;
  75.  
  76.     while (--argc > 0 && (*++argv)[0] == '-') {
  77.         for (s = argv[0] + 1; *s != '\0'; s++) {
  78.             switch (*s) {
  79.             case 'd':
  80.                 _res.options |= RES_DEBUG;
  81.                 break;
  82.             case 'a':
  83.                 if (--argc > 0) {
  84.                     name_or_addr = ADDR;
  85.                     net_name_or_addr = *++argv;
  86.                 } else 
  87.                     terminate();
  88.                 break;
  89.             case 'n':
  90.                 if (--argc > 0) {
  91.                     name_or_addr = NAME;
  92.                     net_name_or_addr = *++argv;
  93.                 } else 
  94.                     terminate();
  95.                 break;
  96.             default: 
  97.                 terminate();
  98.                 break;
  99.             }
  100.         }
  101.     }
  102.  
  103.     if (name_or_addr == UNDEF) {
  104.         if (argc > 0) {
  105.             c = **argv;
  106.             if (isalpha(c)) {
  107.                 name_or_addr = NAME;
  108.             } else if (isdigit(c)) {
  109.                 name_or_addr = ADDR;
  110.             } else {
  111.                 terminate();
  112.             }
  113.             net_name_or_addr = *argv++;
  114.             --argc;
  115.         } else 
  116.             terminate();
  117.     }
  118.  
  119.     if (argc > 0) {
  120.         fprintf(stderr, "extra arguments ignored:");
  121.         while (argc-- > 0 )
  122.             fprintf(stderr, " %s", *argv++);
  123.         fprintf(stderr, "\n");
  124.     }
  125.  
  126. /*    fprintf(stderr, "name_or_addr = %d, net_name_or_addr = %s\n",
  127.         name_or_addr , net_name_or_addr);
  128. */
  129.     switch (name_or_addr) {
  130.     case ADDR:
  131.         net_entry = getnetbyaddr(inet_network(net_name_or_addr ),
  132.             AF_INET);
  133.         break;
  134.     case NAME:
  135.         net_entry = getnetbyname(net_name_or_addr );
  136.         break;
  137.     default: /* can't happen */
  138.         terminate();
  139.     }
  140.  
  141.     if (net_entry) {
  142.         printf(" Official name: %s \n", net_entry->n_name);
  143.         printf(" Net addr. type: %d \n", net_entry->n_addrtype);
  144.         printf(" Network :  %u ----> ", net2 = (unsigned long)net_entry->n_net);
  145.         for (nn = 4; net2; netbr[--nn] = net2 & 0xff, net2 >>= 8)
  146.             ;
  147.         printf("  ");
  148.         switch (nn) {
  149.         case 0: 
  150.             printf("%u.%u.%u.%u", netbr[0], netbr[1], netbr[2], netbr[3]);
  151.             break;
  152.         case 1: 
  153.             printf("%u.%u.%u", netbr[1], netbr[2], netbr[3]);
  154.             break;
  155.         case 2: 
  156.             printf("%u.%u", netbr[2], netbr[3]);
  157.             break;
  158.         case 3: 
  159.             printf("%u", netbr[3]);
  160.             break;
  161.         }
  162.         printf("  \n");
  163.         printf(" Aliases : \n");
  164.         for (ch = net_entry->n_aliases; *ch != NULL; ch++)
  165.             printf("             %s \n", *ch);
  166.         return 0;
  167.     } else {
  168.         herror(progname);
  169.         return 2;
  170.     }
  171. }
  172.  
  173.  
  174. terminate()
  175. {
  176.     fprintf(stderr, use, progname);
  177.     exit (1);
  178. }
  179.  
  180.  
  181. #ifdef sun
  182. char    *h_errlist[] = {
  183.     "Error 0",
  184.     "Unknown host",             /* 1 HOST_NOT_FOUND */
  185.     "Host name lookup failure",         /* 2 TRY_AGAIN */
  186.     "Unknown server error",         /* 3 NO_RECOVERY */
  187.     "No address associated with name",     /* 4 NO_ADDRESS */
  188. };
  189.  
  190. int    h_nerr = { 
  191.     sizeof(h_errlist) / sizeof(h_errlist[0]) };
  192.  
  193. extern int    h_errno;
  194.  
  195. /*
  196.  * herror --
  197.  *    print the error indicated by the h_errno value.
  198.  */
  199. void
  200. herror(s)
  201. char    *s;
  202. {
  203.     fprintf(stderr, "%s: %s\n", s,
  204.         (u_int) h_errno < h_nerr ?  h_errlist[h_errno] : "Unknown error");
  205. }
  206.  
  207. #endif
  208.